package com.example.redisstudy.redisCache.utils;

import cn.hutool.core.util.BooleanUtil;
import cn.hutool.core.util.StrUtil;
import cn.hutool.json.JSONUtil;
import lombok.extern.slf4j.Slf4j;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.stereotype.Component;

import javax.annotation.Resource;
import java.time.LocalDateTime;
import java.util.concurrent.ExecutorService;
import java.util.concurrent.Executors;
import java.util.concurrent.TimeUnit;
import java.util.function.Function;

import static com.example.redisstudy.redisCache.utils.RedisConstants.CACHE_NULL_TTL;
import static com.example.redisstudy.redisCache.utils.RedisConstants.LOCK_SHOP_KEY;

/**
 * <pre>
 * 功能描述：缓存工具类
 * </pre>
 *
 * @author: 李明杰
 * @date: 2022/6/27 22:46
 */
@Slf4j
@Component
public class CacheUtil {
    private static final ExecutorService CACHE_REBUILD_EXECUTOR = Executors.newFixedThreadPool(10);
    @Resource
    private StringRedisTemplate stringRedisTemplate;

    /**
     * 将任意Java对象序列化为json并存储在string类型的key中，并且可以设置TTL过期时间
     *
     * @param key
     * @param value
     * @param time
     * @param unit
     */
    public void setExpire(String key, Object value, Long time, TimeUnit unit) {
        stringRedisTemplate.opsForValue().set(key, JSONUtil.toJsonStr(value), time, unit);
    }

    /**
     * 将任意Java对象序列化为json并存储在string类型的key中，并且可以设置逻辑过期时间，用于处理缓存击穿问题
     *
     * @param key
     * @param value
     * @param time
     * @param unit
     */
    public void setWithLogicalExpire(String key, Object value, Long time, TimeUnit unit) {
        RedisData<Object> data = new RedisData<>();
        data.setData(value);
        data.setExpireTime(LocalDateTime.now().plusSeconds(unit.toSeconds(time)));
        stringRedisTemplate.opsForValue().set(key, JSONUtil.toJsonStr(data));
    }


    /**
     * 作用：根据指定的key查询缓存，并反序列化为指定类型，利用缓存空值的方式解决缓存穿透问题
     *
     * @param keyPrefix  业务前缀
     * @param id         业务id
     * @param type
     * @param dbFallback 缓存查询不到去查数据库的函数是接口
     * @param time       超时时间
     * @param unit       超时单位
     * @param <R>        返回值
     * @param <ID>       传入的id
     * @return
     */
    public <R, ID> R queryWithPassThrough(String keyPrefix,
                                          ID id,
                                          Class<R> type,
                                          Function<ID, R> dbFallback,
                                          Long time,
                                          TimeUnit unit) {
        String key = keyPrefix + id;
        //1.读缓存
        String cache = stringRedisTemplate.opsForValue().get(key);

        //1.1命中，isNotBlank,空白的定义是null,"",不可见字符（如空格）
        if (StrUtil.isNotBlank(cache)) {
            return JSONUtil.toBean(cache, type);
        }

        //1.2命中为空串(空对象缓存为空串)
        if (cache != null) {
            // 返回一个错误信息
            return null;
        }

        //2.缓存未命中
        //2.1 查数据库
        R r = dbFallback.apply(id);
        if (r != null) {
            setExpire(key, JSONUtil.toJsonStr(r), time, unit);
            return r;
        }

        //2.2 查数据库还没有
        setExpire(key, "", CACHE_NULL_TTL, TimeUnit.MINUTES);
        return null;
    }


    /**
     * 缓存击穿：逻辑过期方案
     *
     * @param id
     * @return
     */
    public <R, ID> R queryWithLogicalExpire(String keyPrefix,
                                            ID id,
                                            Class<R> type,
                                            Function<ID, R> dbFallBack) {
        String key = keyPrefix + id;
        String lockKey = LOCK_SHOP_KEY + id;
        //1.读缓存
        String cache = stringRedisTemplate.opsForValue().get(key);
        //1.1没命中，isBlank,空白的定义是null,"",不可见字符（如空格）
        if (StrUtil.isBlank(cache)) {
            return null;
        }

        //2.命中
        RedisData redisData = JSONUtil.toBean(cache, RedisData.class);
        if (redisData.getExpireTime().isAfter(LocalDateTime.now())) {
            //2.1 缓存没过期
            return (R) redisData.getData();
        } else {
            //2.2 缓存过期
            if (!tryLock(lockKey)) {
                //2.2.1 获取锁失败，返回旧数据
                return (R) redisData.getData();
            } else {
                //2.2.2 获取锁成功
                CACHE_REBUILD_EXECUTOR.submit(
                        () -> {
                            try {
                                saveShop2Redis(keyPrefix, id, 20L, dbFallBack);
                            } catch (Exception e) {
                                throw new RuntimeException(e);
                            } finally {
                                unLock(lockKey);
                            }
                        }
                );
            }
        }

        return (R) redisData.getData();
    }


    private boolean tryLock(Object key) {
        Boolean result = stringRedisTemplate.opsForValue().setIfAbsent((String) key, "1", 5L, TimeUnit.SECONDS);
        //防止拆箱导致空指针
        return BooleanUtil.isTrue(result);
    }

    private void unLock(Object key) {
        stringRedisTemplate.delete((String) key);
    }

    public <ID, R> void saveShop2Redis(String keyPrefix, ID id, Long expireSeconds, Function<ID, R> dbFallBack) {
        R r = dbFallBack.apply(id);
        RedisData<R> redisData = new RedisData<>(r, LocalDateTime.now().plusSeconds(expireSeconds));
        stringRedisTemplate.opsForValue().set(keyPrefix + id, JSONUtil.toJsonStr(redisData));
    }
}
